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OS6SD V3.3,A QUICK LOOK by M. Heidt 


For almost a year now we have been 
hearing rumors of an improved 65D disk 
operating system (DOS) from OST. Well, 
it has finally arrived. It is 
efficially called OS6S5D V3.3. Many of 
the shortcomings af version 3.2 have 
been fixed, at & cost of 2K bytes of 
MEM Y » 

It i868 a bit misleading to say that 
only the DOS has been improved. Most af 
the changes are in the OSI version of 
Microsoft disk BASIC. Although the DOS 
ig a totally separate entity from BASIC, 
they are $0 well integrated that many 
people think of them as one operating 
system, However, if you run same other 
language or program, such as Forth oar 
the assembler, you still use the same 
DOS. 

The familiar 65D kernel commands 
remain the same. The main change in the 
DOS is that the polled keyboard now 
emulates a Hazeltine 1420 terminal. 
This means that the strange shift key 
operation af V3.2 is gane. The DOS no 
longer calls the ROM at FDOO., The 
keyboard now works more like a 
typewriter. Control functions are 
those of the Hazeltine. This should 
Make programs from the big machines 
(e.g. WFS) work on polled keyboard 
Machines. The rubout key replaces the 
shift-O as the way to erase a character 
from the input line. The auto repeat 
feature is gone. You must mow press the 
repeat key along with the key you wish 


ta repeat. This can be awkward far 
control keys when three keys must be 
held down. This can occur relatively 


frequently because the control keys are 
used to mave the cursor when editing. 
The most visible change is that the 
cursor is now a flashing square which 
appears at the upper left corner or 
"home" position. The cursar maves down 
the screen and scrolling begins when the 
cursor reaches the bottom. 

The most obvious enhancement ta BASIC 
is the editor. This allows you to call 
up any line and completely edit it by 
maving the cursor to the apprapriate 
place. There are shorthand commands ta 
edit a line, recall the same line and toa 
call the next line. This editor is 
always resident. ‘There is alsa an 
editor program on one of the disks which 
Will overlay the editor onto V3.2 
RASIC. 


The nmext big change ig ain the Ost 
BES XESCOM pee acpi akin This new includes most 
got the utilities that used to he 
individual pragrams under V3.2, The 
utilities mow work the way they should. 
For example, they create function finds 
epame drm the directory far you. Y¥ Cou 
pteadl tell at how many tracks ta 
regearvé, bub tht will find the space on 
the digk for you. All of the utilities 
are presented as & menu when you baat 
the system. You cam qet a disk 
Giivectoary x create files, create data 
Wisk, Cam initialized disk with an 
ampty Girectary), capy disks, run 
Droagrans, eta, 

The copy program i6 worth special 
mentian.s This is the best capier If have 
ever seen for OST digk systems, i 
allows capying with single aor dual 
Chi ekg. It checks to see how much memary 
you have, and then reads as much as it 
can freanm the sowece cdigk before writing 
to the destination. In oa 48k system 
with ane drive it only takes three 
changes of the disk for a camplete copy. 

The copier aleoa initializes the tracks 
to be written. The only drawback I 
have found is that the copier always 
starte with track zero, Tt will stop 
anywhere you tell at, but you must start 
with 2ero, The old copier is still 
avallable af you wish to capy a few 
tracks in the middle of a disk. All af 
tne wutilities, inelucding the copier. 
return you to the BEXECK menu when 
finished, 

The mew diskettes alsa include same 
Wserull utilities that are mot im the 
BREXECX. These are anes that you dan't 
Use quite sa often, These include a very 
nice machine language re-numberer for 
basic pragrams, a repacker which removes 

XtranNneous spaces and remarks from basic 
pragmams, and a utility to add/delete ar 
check for disk buffers on existing 
proagmams. All of the old V3.2 utilities 
ave still there as well as one or two 
New Ones. The new utilities are 
actually usefull where the old ones were 
more of an advertising feature. 

When you get through playing with the 
Utilities and sit down to write a 
pragram, you will fand a& wealth of new 


features in the V3.3 BASIC, You mow 

have complete cantrol of the cursor by 
WSe Of special print statements. This 
gives the equivalent of the (MMAR CS 


availlable im the Hazeltine 1420, such as 
HOME » wae iti, CLEAR TO END OF 


SCREEN, etc. You can define a print 
window anywhere on the screen. This 


WiNndGw can be defined as any number af 
lines of any length, as long as it is 
emailer than the default screen size. 
It remains in effect until changed by 
another screen define aperatiaon ar by a 
keyboard command from the command mode, 
The new FRINT commands alsa permit 
caontreoah of colar, screen sige, and 
reading af the character under the 
CUT BO You will alee find the lang 
awaited FAINT USING command, This lets 
you format numeric output so that 
decimals line up and columns are easy 


to define, Ne more converting umber ¢ 
to strings just to line up a decimal. 
All an all, a powerful set of commands, 

One of the most impressive things 
about the new DOS is the documentation, 
This i6 by far the best ever put aut by 
OST and as good as many in the industry. 

Althouqgs ait if not as "Slick" as that 
of the Apple or Radia Shack, I believe 
it 468 cansiderably more complete. Far 
the first time DOS user, the manual 
starts at square one and quides yar 
through the system step by stem. The 
instructions are clear and there are 
adequate examples. The documentation 
does ageume that the reader 16 sitting 
at the camputer, The instructions take 
the FokM af “DO THis", “YOU SHOULD SEE 
THIS" » "IV MEANS THith as”. 

For the more saphisticated user, the 
inteoaduction refers you immediately ta 
the section on VWa.3, This seatiars 
assumes that the reader is familiar with 
Vo.e and proceeds to explain the 
changes and enhancements of V3.3. At. 
the back of the large binder is a set af 
appendices which summarize everything. 
This section can be pulled aut and kept 
by the computer as a handy reference, 
Also included in the documentation are a 
complete memary mao showing all versions 
of Q8630 (Gid, Mew, Grinch, ahe S-inch) 
Plug a digk map showing which is an each 
track af the disk. 

While most af the information in the 
Va,.0 documentation has been available in 
ane form ar another, this is the first 
time I have seen it all in one place and 
organiged im a reasonable manner. It is 
aleo the best "first time users guide” 
that If have ever seen for the OST 
System. 

Thas should be enough to give you an 
overview of  OS6SD V3.3. It casts about 
$80 fram mast mail order places. LT fedt 
that the editor, copier and 
documentation were wort the price. The 
rest ais gravy. LT Wave cat found soy 
major bucqe. Everything works if you 
take the time to read the manual and 
follow the examples, I am pleased with 
it and can oanly hope that OST will see 
fit to make this software standard with 
all new systems. No OST digk owner 
shauld be without ait. 


MORE COMMENTS ON V3.8 by RK. Biedenbach 


I?m mot a subscriber to the Aardvark 
Journal, but oa friend showed me the 
letters regarding OST 65D V3.3. What I 
want to gay i686 BALDERDASH!! AND MORE 
RAL DERDASH | Just kidding guys, want to 
keeps this light. But get out the fly 
paper and the raid for OST 63D V3.3 i8 
full of bugs. 

I also believe ait is the best 


software and documentation OSI has dane 


to date, ooo MAS SOME very powerful 


features, such as print at, print using, 
windows, and the Find command which is 
my favorite. 


When it comes toa budqs even an 
Aardvark is not beyond reprave. I 
recently purchased Tiny Compiler on 8" 
disk and the program had missing lines 
and mis~-numbered lines which resulted in 
the FORE and the LOOP functions from not 
operating. Even I, who recently wrote 
and published "OSI 65D V3.3 GUIDE" 
suffer from this human condition. 


Here is a list of the bugs in OSI 65D 


ne oe 
teed teed Bt 


1. CONTROL X DOES CRASH THE SYTEM 

2» PRINTER DUMP DOESN’ T WORK: 

me ERRORS IN V3.3 BEXEC 

4. DISK COPTER WILL CRASH SYSTEM AFTER 
USE 

we V3.2 NOT UPWARD COMFATABLE TO 3.3 
DATA FILES 

6. V3.3 HAS LIMITED DOWNWARD 
COMPATIBILITY TO 3.2 

7. OST LEFT OUT ALOT OF VALUABLE DATA IN 
IT’S MANUALS. 


Now comes the plug, my manual covers 
the above and mare. So for all the 
answers, Buy, read and tell your friends 
about "OSI 65D V3.3 GUIDE". 

IT will share this, to fix the control 
X 80 that it doesn*t crash your system, 
(if you have less than 48K) add the 
following pokes to BEXEC: 
POKE9S93,234:POKE9S94,234, This 
disables the keyboard routine from 
seeing a control xX. 


To enable the control xX, 
POKE9S93, 201:POKE9S94, 24, 


P.S. OSI 65D V3.3 is available from 
Buffalo Informational: Tech. for $14.95. 
209 Richmand Ave., Buffalo, NY 14222 


RELOCATING WF-46502 by J. Roecker 


WP-6502 i8 a very nice word processor 
for OSI machines. Unfortunatley WP-4502 
Uses memary locations #0222 through 
$0235 which are also used by many of the 
nonstandard manitor ROMs available 
today. I own a CiP which I have 
madified by adding an Aardvark Cis 
monitor ROM and an expanded screen, i 
recently wanted to write an article for 
the local OSI user's group and was asked 
to use WP-4502, The Aardvark Cis 
manitor ROM uses memory locations #0227 
through $O22F for cursor positioning and 
subroutines disabling WP-6502. The 
choices I had to enable me to use 
WReRGSO2 were: Put my standard OST 
monitor ROM in, Relocate WP-6S02, oar 
Weite the article by hand. 

[T have many routines which utilize 
the CiS monitor features so the first 
choice was eliminated. I did not want 
to write the article by hand so I chose 
to attempt to relocate WP-4502, 4 phone 
call to Aardvark T.S. reinforced my 
decision because Rodger Olesen laughed at 
my plans. 

The items need to relocate WE-~4502 
ae ess (1) Some program to perform the 


relocation (OSI Extended Monitor), (2) A 
listing of WP-6502 (convenient but not 
necessary). 

I used the following steps to 
relocate WF-6S0O2 (all address locations 
mentioned are nonrelocated addresses) : 


1. Relocate WP-6502 to the desired 
locations. In my case TI relocated it 
from locations $0222 through $OF98 to 
locations $0235 through #OFAR, 


ce. Replace the data which the 
nonstandard manitar ROM destroyed. In my 
case memory locations #9222 through 
PORE hacl to be replaced with the 
following datas 


POR Se ; MPC OB 


SORLL4ARO 1 FOVASSAWO 
POR LoBAIO $OBL7=4O 
$O229=7F SOBLPR ZC 
POVLA=AIC $O 2 LR= SD 
$OLZLC=SE $OBLOZOR 
Bo ek Ee eee ROLLE SE 


If you have an Aardvark CLIE/C2E 
monitor ROM, locations $O230-$0234 will 
also have to be corrected. 


POBRAOZ OA $OVSL HAZ 
SOVILA SC $OBSS=OA 
$OLZS4=200 


oe Instructions which reference data 
outside of the limits of the relocatian 
will not be modified by the relocation 
POUL NG. In this case one such 
instruction @xistss the instruction 
located at *#024F, Tt will have to be 
madified by adding the amount of the 
relocation. 

$#O24F BDOSOZ LDA $8OBOS, xX 


4, Data tables can cause relocation 
routines to misinterpret data for 
instructions. In the case of WR~-65302 
there are two cases of this: the 
instructions at locations $9671 and 
$0784, The address fields of these 
instructions will have to be modified by 
adding the amount of the relocations #13 
in this case. The non-madified 
instructions ares: 

$0671 201503 JSR #03135 

$O784 207104 JSR $0671 


oa. BIT instructions are sometimes used 
to provide multiple entry points inte 
subroutines. The relocation routine 
might possibly modify the address field 
of the HIT instruction, which is really 


another instruction. In the case of . 
WP-6S02 there are seven occurences of . 
this. Instructions located at $0307, 


$0317, $O3DO, BOSRDD, FORER should all be 
2CAZ04 BIT $0246. The instruction 
located at #0323 should be 2CA2ZO2 BIT 
SOBZAZ . The instruction located at #O3C3 
should be 2CA206 BIT $0682. 


| be The warm start code will have to be 


moadified if you have a CiS because the 
CisS will mask out the “Line Feed’ 
character making it very difficult to 
edit data using “Line Feed’s. I modified 
the warm start code s0 it will use the 
old video drivers for all cammands 


excent for the W/Tape command. [It must 
W3e Che mew video routines. The 
following code has warked for mer insert 
tt at the memory locations indicated. 


OOF A SPOOL) LDA AOC) 
OR SO BNLIOG STA #OSRY 
OFCr BDS906 STA $0639 


OOF it OT LDA BaD 
OrF44 SNLAOZ STA BO21T4 
OR AZ AO EF Ley FB Er 
OF49 SDNLRO2 STA #O218 
OF Gr AILS LOA RBS 
OF OL BD290G STA $Oo2 
OF Ps AOBO LOR BEC 
OFFS BDA906 STA $0639 
OF GY AYO? LDP He 
OFOR BDLAO2 STA HORTA 
Dr VE Aor} LDA FIR FE 
QFAQ BDLEO2 STA 8OR1 R 
OF AS AGRO LDA HAO 


OF AS BDeAOR STA SO224 


7u The cold start code will have to be 
modified to use the proper data/text 
starting address. This address is #OF9R 
in the none-relocated WR 46302, This 
address will have to be modified by 
adding the amount of the relocation. 

OF AR AYOF LDA BOF 

OFS ASOR LDA #E9E 
The warm start jump will have to be 
madiftied alsa, The amount of the 
relocation will have to be added to the 
immediate data below: 

OF AZ BOOR LDA HOR 


This should complete the modification 
needed to allow We-63O2 to be relocated. 

T hope with these corrections you will 
be able to enjoy WR-68oO2, 


The Hand Assembly of Pragrams for OSI'’s 
Machine Language Monitor 

Im this article I will discuss the 
implementation of assembly language | 
pragmams an the CIiF by the use of the 
machine language monitor. All numbers 
will be in hexadecimal, and a knowledge 
af the moanitor and its capabilities is 
assumec. If you aren’t familiar with 
£ ts Co suggest you read page D-S of the 
Users manual, 

Although BASIC is great, machine 
language oaffers a tremendous challenge, 
anc it a6 far faster and slightly more 
flexible than KEASIC. A knowledge of 
machine language is useful to everyone 
Since it can be used to increase the 
spe@ec and power of RAGSIC., The mandi tor 
pravides a rudimentary, though adequate, 
teal with which to explore and learn 
about machine. language. 

Since almost any 6802 book deals 
exclusively with assembly language, and, 
Ultimately, any machine language program 
starts out in assembly language, it is 
the user's problem to convert fram 
assembly mnemonics to hexadecimal 
opcodes that can be uged by the monitor. 

Tf you will look at a conversion chart, 
such as the one on the back of the Users 
manwal, you'll find that under any 
given mnemonic, several opcodes are 
yours to choose fram. This ais very 
canfugsing and it merits some 
explaining. 


Each mnemonic converts directly inte 
ane opcode, but most require one ar mare 
additianal bytes which determine the 
informtion that the microprocessor is 
qgjing to process in the manner that the 
opcade dictates. For instance "JMF 
AL74" tells the microprocessor to start 
axeauting inetructions at location AR74, 

The opcodes that you would put in with 
the monitor to get at to do this are 
(the critter doesn*t understand  JIMF 
unless you have an assembler program) 
When the microprocessear finds a 40, it « 
automatically knows that it needs ta get 
the mext two numbers, which will be the 
acldr eas. 

Similarly, when it executes the 
instruction "LDA, FF" which translates 
to "AP FF" it knows that the ingtructian 
"AS" needs anly one number ta aperate an 
and the next number after FF will be the 
next instruction Qn the other hand, the 
ingtruction "LDA (DFOO)", which 
translates ta "AD OO DF" tells the 
micraprocesgar to load into the 
accumulator the number that is stored in 
Location DFO. In the first instance, 
we loaded a literal number into the 
accumulator, the ane immediately after 
the ainstruction. This mode of 
addressing requires two bytes, one far 
imstruction, one for "argument". 
Cangulting the last page of the Users 
manual, you will find that the opcade at 
the intersection of the “immediate” 
column and the "LDA" row is "A", In 
the second example, since we wanted t¢ 
lead in the value of a Specific nemor ae 
lecation, we uged the opcode "AD" to 
tell the microprocessor that we were 
going to use the "absolute" form of 
addressing. Since there are thirteen 
forms of addressing, you should read the 
chapter in your 6502 book, that explains 
about addressing. This i8 pretty deep 
stuff, so you might want to read it over 
several times. In addition you should 
became familiar with the way each farm 
is represented in an assembly language 
Brag am. 

Now, assuming that you understood all 
that, try your hand at converting and 
leading this simple assembly language 
Oe Oc ams 


SrA Deio setore the value of the 
accumulator in the center af the scr 
JSR FDOO sqet a character fram the 
keyboard which will be left in the 
accumulator 


CMF 40 yeee if the character is an 
st i ta 
BNE FY yetart over if ait aen'et 


JMF FEOO return pragram control ta the 
mona tor 
If you translated that program properly . 


it will look like this: 


8D 10 Da 

ao OO FD | , 
Co 4D ~ 
DO Fé 

4C QO FE 


All af which brings us to another 
point. When you come to the end of a 
machine language program, you still have 
to have the machine doing samething. + 
the program is a USR routine, you must 
end ait with the opcode RTS (460) to get 
back inte BASIC. If the program is 
independent of BASIC, like this one oar 
any of the examples that you will enter 
from a book, you probably want to return 
to the monitor as TI did here. Unlike 
BASIC, your machine language programs 
can be put anywhere in RAM, even in the 
Screen memory, except OOFH-FF, which are 
used by the monitor. | 

Tf you don’t have a tutorial book, 
get ane! I also highly recommend 
Aardvark’s FIRST BOOK OF OSI, which 
tells where all of RBASIC’s useful 
subroutines are, and how to use them (it 
also has some great stuff about how to 
use HASIC). A disassembler program, 
which, as the name suggests, converts 
apcede ta mnemonics would also be very 
helpful since it would enable you to 
learn by example by looking aver other 
peaples* programs and the BASIC machine 
code, 


EFRAIM RIVERA, AURORA, COLORADO 


TIT purchased WP-6502 a word processor 
program from DWO QUONG FORK LOK SOW and 
was totally satisfied with ait, except 
for ane minor problem. Data was 
transferred to the printer at 300 baud. 
I would print 3 pages of information and 
it would take quite a lang time. After 


Sane investigation I found that the word 


processor program used the ROM routine 
to initialize the ACIA. Even though it 
is possible to use basic to poke the 
necessary values to the ACTA to set it 
up for 4800 baud, as soon as I ran my 
word processor program it would 
re-initializge for 300 baud. After 
leoking at the CiP/Superboard schematics 
I found an easy way of modifying the 
buad rate in hardware. The modification 
includes installing a switch so that the 
operator can switch between 300 and 4800 
baud, the 300 baud is still needed far 
the cassette. 


To install the modification follow these 
steps: (SEE FIGURE #1) 


1. Cut the trace going to US7 pin &. 

te Solder a wire to US7 pin 2, solder 
the other end of the wire to the common 
terminal of the SFDT switch. 

oe Solder a wire from the trace that 
was cut to ane pole an the switch. 

4, Solder a wire fram USO pin 14 toa the 
other pole of the switch. 

we Mount switch on front panel at any 
convenient locatian. 


NOTEX: the above modifiction should be 
installed on the COMPONENT SIDE of 
boarc. 


FIGURE # 1 
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DAVID A. TAJKOWSET 


For those owners of Series II CiFP’s 
that like watching mindless displays on 
their screens, might IT suggest one of 
these two, the second of which makes my 
eyes hurt. 


Ad 19 FORA=OTO2ZSS5 :FORR=S3S14TOS459995 
POKER, A:NEXTE,A:GOTOLO 

BR) 10 FORB=S3314T056999: A=INT 

(RAND (BE) kK255) :PORER, A: NEXT:GOTOIO 


Tam not certain if they work the same 
way an the old CIF. 


HINTS ON 
"VIDEO SWAP" 


I have a Superboard II series II and 
am very impressed with the improvements. 
The digital ta analog converter is a 
real potential superport. The 12 X 48 
display is a fantastic improvement in 
readability. I use it almost 
exclusively for pragramming now that I 
have converted same of my utilities to 
this format, 

IT have been watching the Journal and 
other publications for program or hints 
aon these features but to no avail. So 
maybe I can get the ball rolling by 
sharing same of my thoughts on the 12 X 
43 display. 

The 12 X 48 display is enabled by a 
"Video Swap" program which OSI supplies 
with the CIP. The Series II Superboard 
ig identical so I got aicapy = from my 
dealer to use with the Superboard. It 
cames as a BASIC program that loads in 
the highest available memory a : 
replacement for the video driver routine. 
in ROM. It's hooked to BASIC via the 
output vector at S38-S39. 

I soon discovered some difficulty 
with this program, Firet of ali it is 
very volatile. Using the Hreak Key 
returns to the normal 24 X 24 farmat and 
seemingly looses the program. I soon 


discovered it writes over the output 


vector and resetting this recovers it. 
In am 8K machine you use 

PORES Sa, 732 PORESS9, Si. These must be 
one ane line because you can send your 


CEU an a wild goose chase if you have 
only set one of the two values. Lf you 
have other than Sk you can FEEK these 
lecations while in the le X 48 made ta 
find the proper values. 

My mext dilemma concerned using this 
with other machine code routines. QSt 
has made this a relocatable routine but 
the BASIC program sete it by the highest 
meanary an your machine. Quite a few of 
my machine code routines were set here 
also and To had to make a choice about 
which to wee, I first used a little 
trick ta get these programs both in. I 
first checked with the machine routines 
to see where they started. Next TI used 
the memory limit (RREAK ©) to set high 
mamory before loading the "VIDEO SWAR" 
then jloaded my second program. Eind of 
& long process, but it worked. 

LO the next problem. It Seems ag if 
a number of my routines alsa used the 
same mutput vectar, This if normally 
set ta @FF 69 and TF found that these 
BrOGrANS were jumping to that address. 
Since fT had replaced the output vectar 
for the video swap I had to set these to 


the Video Swap alsa. Am aindireat jump 
Vie the @utput vector would be the best 
WAY » 


I still had the diffadculty of loading 
the swap after I had a& program in, Lt. 
had to be in first. This I solved by 
renumbering the video swap with higher 
line numbers and removing the new 
ClCa Mme cd (In Line OO in the OST 
Version.) 

Now If could load at with a RASIC 
program already im memary. However, it 
Used Up quite a bit of free RAM this 
WAY » Then I converted ait to machine 
cade load with the extended monitor (see 
Journal Vol. 1 No. 3, page @)., Y alsa 
added the following bit of code sa it 
cames up im the 12 kK 48 format. With 
this additian T can geo to #O222 and 
reset the pointers after a BREAK, 


19 sSET FOINTERS FOR VIDEQ SWAF 
20 EVALUES FOR TOF OF 8k (#1F 47) 


mQ Ke POR! 


40 OMe AD 47 LDA 7S SLOW BYTE 
wo O224 85 1 STA 12 ;STRING TOF 
60 O226 85 85 STA JAAS RAM LIMIT 
79 0223 8D 1A O2 STA Se SQUTFUT 

ao O22 AD TF LDA AI. SHIGH BYTE 
90 O22D 85 82 STA 130 ,SOTRING 

100 O22F 85 86 STA 14 1 RAM 

120 O26 8D th Of STA BaF 4 VECTOR 
te Ona4 AG OF LDP RL SET TO 
io? «=ORoo ES Fe STA 251 y 12X48 
SCREEN 


140 0238 40 47 IF JMF #1F47 sVIDEQ SWAP 


NOW. .ANYONE WITH SOME FIROGRAMS FOR THE D 
TO A CONVERTER’? LET'S HEAR IT 


KM, SODERRECK, JACKSON MICHIGAN | 
Sane time aga I found a VERY FAST 
SCREEN CLEAR for the CIF, as followss 


10 A=PEEK (129) :B=PEEK C130): 
POREL29,O0;POKEL3O, 212:S¢=" "s FORGE TO? 
20 G#=S$+See" "2 NEXT: POKELS9, A: 
FOKELSO, 8 


I tried it on my CBF and it only cleared 
part af the screen. I experimented with 
the proageam and came up with the 
following ta clear the entire screen oan 
the CaF. 


S REMSVERY FAST SCREEN CLEAR FOR THE 
Car 

6 REM:RY R, GSODERBECK 3-25-82 

10 ASFPEEK (129) :B=PEEK C130) 2X20: 
Ye2ier2e2i2 Gee" yTpen 

20 FPOKELZ9, X:POKE1S0,VrFORK=1TO2Z: 
SH=SH+ THAT H+ THs NEXT 

30 POKEL29, ArPOKELSO, B 


There are other combinations, but this 
ane works very good. 

Twas interested in finding out how 
this program worked and after some 
experimenting. T came up with some 
interesting results, 

The screen memory, for the C8F, is at 
DOOO through D7FF and the color memory 
ig at EOOO through EVFF. I found that { } 
the required POKE location in the screen 
Clear programs FPOKEL29,0:POKE130, 216 
(HEX DBOO)s is ane address beyand the 
last screen memory address of D7FF. The 
equation of line 2O builds a series of 
strings using the values of S$ and T# 
fin this case, blank spaces) starting at 
the "POKED address minus 1, and working 
backwards. 

To see how this works, use S#="X" and 
Tie (for example) and very the value 
of Z fram 1oup. You may even change the 
number of T#*s im the equation, however, 
if any one loop through the for—-next 
loop creates a string longer than 256 
characters, you get a "lang string" 
eye ce Ry changing the FOKE address, 
the equation, and the values of S# and 
TS, you can put mast anything, anywhere 
on the screen, 

This also works for the color memory. 

However, I found that it works only for 
cQlor values of 0-9, After trying 
various ideas, I found that the color 
Values can be represented by letters: 
1=8, 228, 3=C,etc. 

The following creates color patterns 
demanstrating same of the possibilities 
Weing this program. The variables used 
are: C$=color:s X and Y=starting 
lacations Z=number of FOR-NEXT loops: 
Lenumber of lines: Neaddress increment (oy 
for start of maxt line: Beequations 
C=line length change: G=number of times 
through delay loop between lines. 


10 REMs COLOR DEMO BY KR. SODERRECK 
ahs Rol 

190 PORKESS832, 5 

LOB XeOoeVeBlesZeeisr ope Ue Tge 

"s GOSUBEOOO 

110 Ye S221 Soe" s THe "Bs GOSURBROOO 
140 C$he "Oe Xe OL eeVeBn7sZeGslLelea Neos 
Ress CeeOs Ge BOO 

142 GOSUBRSAO 

L485 Ode 7s Xe Bee Ye ees ZelilelosNeo4: 
Faas (lan dog yo 

147 GOSUEBOO 

Lo Cpe Ns Xe BOS: YB Zed slLediaeMe-OSs 
Bes Caml e Ge Boo 

132 GOSWURSOO 

13S CH= "DO" s Xeleor Ye 22o:s Zelesleas Ne-64s 
Kye Jog (lees Ge 700 

1837 GOSUBBOO 

160 Che "Hs Xe 12s Ye Boos Zed ale 2os Neo a 
Ronis (eds Ged O 

Lée GOSURBOO 

165 CBee P sXe O4s Ye Bals Ze 72 Lee Nem G4 
Beds Oxi s G=2O0 

167 GOSUBSOO 

170 Ope" Ls Xe laos Yoel ees Zeoe led ite Nees 
Berd OO, Ge1oo 

172 GOSUBSOO 

190 GOTO1LOS 

BOO FORA#L TOL 

BOS S$=lO$s THE CH RFCS 

SLO ONEGOSURLTOOO, 2000 

wen XleX+Ns Ze Z+-0 

wad IFXLAOTHENGOTOS7O 

S40 IFX1°23535THENGOTOS60O 

Sao) XeX ls GOTOSBO 

SOO X#Xl25 os Y2Vrd sGOTOS8O 

O70 X#Xl+25 Gs Y2¥~-1s GOTOS80O 

380 FORF=1TOG: NEXTFE,A 

BOC) CS $95 sens a u 8 we: u 4 THe" i) 

399 RETURN 

1900 POKEL29, XsPOKELSO, YeFORK=1 7022 Ste 
d+ T $s MEX Ts RETURN 

20900 POKEL29,XsFPORE1ISO, YsFORK=1 702s Sé= 
S8+ODSs NEXTs RETURN 

WOOO POREL29, XsPOKELSO, YsFORK=1 702s St= 
OSH+ TH+ T6+THs NEXT 

WOLO RETURN 


WILLIAM ZAYDAK, ROCHESTER NEW YORK 


Similar to Dave EBroyhill’s idea about 
a baud rate selector, you will see a 
schematic for a circuit addition that I 
mace about a year ago on my SHII Series 
If. It has been in use with the baud 
mad an Us that most people know about. 
The addition came out of the sheer 
frustration that came from debugging 6k 
programs. The idea was that in the SAVE 
mode if I tapped off the different clock 
rates available then I could scan 
through the program LISTing or RUNS at 
different speeds. It alsa allows me toa 
step LIiSTing and RUNS without having to 
re-enter line mumbers, ar commands to 
corr td se o 

The output of the 74151 is selected by 
a bit pattern that is present at the 
"LS1l"'s select (ARC) inputs. To hold the 
bit pattern present ai 7478 latch was 
wUsed. It will latch when the latch 
enable goes from H to L to H. The input 
to the "73 can come from an encoder like 
the one oan the schematic oar a set of 
gwitches. The encoder only has to go up 
to 7: netice the "151" pin 4 has no 
cannection on ait. This is so that when 


Lo ae a 
= 3 push by trons Display 


the © (latch) key i168 pressed, the 
Maltiplexer will switch to a mull oinputs 
mo clock pulses presgent-the digplay will 
stop, The latch (0) key setup was opted 
for aver detecting a key closure Ca 7450 
connected anto the key lines with the 
other L/2 or the 7420 oan its output as 
an invert and creating a latch pulse 
with ao 74125. This way accidently 
pressing & key will not change the baud 
rate. You must press the baud rate key 
you want then press and let go of the 
latch (9) key. AS for the clock lines, 
just trace from the chip pins listed toa 
& through hole. In my final versian I 
must admit ta soldering onto the USY and 
USO pings from below with a 27W iron and 
tinned wire. T mounted the “1S1" on 
perfthoard, am the 600 board. The baud 
rate keyboard and encoder cannect ta the 
"1S)" with a S conductor cable, You 
cawlad use a DIN plug and make up a 
header for when it is disconnected like 
I did. 

There is a CLIP§MF in the lab where I 
teach and I recently had the experience 
af finding a data track eaten away. t 
made the mad suaqgested by Ed Keating, it 
is $0 simple and it works: why doesn’t 
OSf set ait up that way? The option 
showld be to modify it so that the head 
is always loaded, mot the other way 
Ar Oud . 

A statement that I have found useful 
withthe CIiPsMF iss 
POKREOSBOO, 2544s Ps Pe POKE9BOO, 64, It came 
fram taking Dave Sugar’s suaqgestion to 
play reaund with those pokes he listed. 
This statement will give you rather 
effective screen clear and will space 
Simultaneous ouput to a printer with 3 
linefeecds. 


Keyboard 


5 
Canouctor 
CARIE 


a 
| oe A 
fe ee Gathooe 


Co 
SN Ne? LEO display) 


NO FOIL CUTS! 


ON 600 BOARD: INPUTS: 
¢ 6 @ NC 
A 6g t USS Vint? 
n < 2 U59 Pini3 
SB 3 U59 Pini4 
= Rw 4 y60 Pini4 
ae 5 vU60 Pin13 
S 6 U60 Pin12 
7 U60 Pini1 
Output: 


2 goes to J3; the Molex where the power 
wires go into the board. Disconnect what- 
ever is Oh PS Conneet in Q from the 151. 


MUSIC FOR THE CiF ET. AL. 
. by Gerald Artman 
After trying to make more than the 
Sliding whistle sound listed in the CIF 
manual (Series Il), I have written the 
following pragram to write and play 
music tChraugh the noise port. For those 
with Series CilF*s, you can buy 
instructions on how to add the noise 


part fran Aardvark. These with other 
micros can refer ta the May 81 edition 
of "MICRO" for instructions am adding a 


noise part.  EBasically, any mic with a 
parallel port can use the routines. 

The program produces a Square wave 
SUt PUT. For those who are confused 
already, square means that the sound 
starts and stops abruptly rather than 
rise and/or fall slowly. To produce 
this sound you only have ta toggle a 
line on and off. A noise port produces 
& very high pitch seund. This pitch can 
nat be altered. On the CIF at can be 
played loud or saft, depending on what 
Value i6 sent to the port. To make a 
range of notes, the camputer must turn 
off and on the sound at different 
lengths of time. The result-a lower 
nate.  Recause RASIC operates through an 
interpreter it is usually too slow to 
change the output significantly. 

To make simple music you must use 
machine language routines to divide up 
the time and play the notes, Most 6502" s 
operate at a clock rate of LOOOOOO 
eycles per second. To produce a tane, 
the frequency will be the result of the 
time spent ain a machine language 
routine divided into the clock rates FQ 
= 106) /LOOP TIME. The length of time 
the note will be played will be 
dependent aon the number of times the 
leep is executed: N X LOOF/1O(4)., 

Table #1 is a list of the frequencies 
from middle @ to BR. Te produc other 
octaves of higher ar lower notes just. 
divide or multiply by two for each 
octave. The following equation is used 
to produce a note arguement FQ in the 
range O25 % 

Qa (10°/DESIRED FREQ.) - 45 

; 70 
The 45 accounts for the time used in the 
aperation of the loop. The loop is 
expanded fram the smallest possible, & 
cycles, to 7O, in arder to produce low 


notes. Fiqure #1 shows the notes that 


can be produced by this equation. 


To alter the duration of play, 
additional parameter must be computed. 
Music 26 played according ta tempo with 


each note having a beat value. 


tempos are 100 beats/minute for 4/74 time 
and 80 for 3/4 time. The actual time 


durcation for a note would bes 


INSERT py = (BEAT VALUE) X 60 


TEMPO 


The number of times to execute a loop 


can be reduced to the equations 


TIME ARGUEMENT = DU X FREQUENCY 


This music program calculates 


arguements far each mote and stores them 
in menory far play or saving on tape. 
Rather that use array storage or 
strings, each value is poked into memory 
directly starting in the upper 4k . 
hexd, The machine language routines are 
located at #0250 ta 8O2R2. Tf this space 
is not available on your machine, 
can be relocated, Da not forget toa 
change the calling address in the basic 
program. TO $ave a song on tape 
preagram puts a header an the tape then 
prints the peek value of each memory 
location until the end of the table. 
input the program reads each value 


pakes it directly inte memory. 


Froavisions are made for recording 
gactians and adding them together. 

When using the program, a menu will 
appear. TO input a series of notes, 
first the tempo will be requested. 
the beat value, octave and note name for 
each note will be requested. Each 
octvae is numbered from 1-5, see Figure 


omege 


#1, For rests use actave 3 note name 0. 
To exit the input section enter END 
note name. To correct a mistake count to 
the note number to be changed. The edit 


function will recalculate and 


the information. As written the program 
Will handle about 1000 notes. I havent 
typed ain that large a song, but I have 


entered five songs in a row. 


relocating the storage area, music can 
be added ta other basic programs 


pravided there is enough room. 


nate uses three bytes. All that 
needed to play the music is the machine 
language routines and the note table. 


Loak out Atari. 


LISTING 1 


NOTE sXRGUEMENT PASSING PROGRaM 


STak? ATZO027A 


USeS ZERO PAGE LOCATIONS: £FO,SF1,$Ff2, gF3,eF4 


0274 LDA #00 

O270 Sia gr0 
0278 LDa #310 
0280 STA $24 
0282 LDA #$FF 
0284 STA 3F2 
0286 LDY #00 
0288 LDA (3F0),Y 
0284 STA 3F3 
o28C INY 

O28E LDA ($FO),Y 
0290 STA $F4 
0292 INY 

0293 LDA ($FO),Y 
0295 BNE 02 


; set zero page tor indirect at £1000 


; store loudness in $F2 


set y to zero for indirect address 
get duration low arguement 

store at gF3 

increment for dumation high 

get duration high and store 


We we We We We 


increment for note arguement 
get note 
if not 0 then skip next step 


wewe we 


else turn off loudness for rest 
see if end of song 

if so return to program(basic) 
else play the note 

bump y and add to table base 


0297 STa aF2 
9299 CMP #01 
0293 BEY (out) 
029D JSR $0230 
O2A0 INY 

O74) YA 

O2Aa2 CLo 

O2435 ADC SFO 
92a5 STA GFO 
OPaT7T BCC 02 
O2A9 INC HF2 
O2A3B LDX ASFF 


we We WO WO WE 


waste some time to seperate notes 


we 


O2aD DEX 

O2An BNe FD 

0280 JMP (loop) ; get next note 

9233 RTS (out) — ; return to basic program 


NOTH: CAN BE RELOCATED ANYWHERE. MUST CHANGH ADDRESS aT 229D 
TO NEW SUBROUTINE LOCATION aND BASIC PROGRAM CaLLING RCUTIN=S 
(X=JSR(X)) BY POKEING NEV LO@saTION IN 11 and 12. 
LISTING 1 Gon’ tv. 


FLAY SUBROUTINE sPakRt a? 90230 


add 30 states to loop. total time 
is 55 cycles 


23) OP wOP NOP WOP NOP 
J23e AO WOP NOP NOP WOr 
0241 wOP NOP NOP NCP NOP 
0246 UNE (loop) ; if not O do over 

QO248 250 00 ; waste time to equal duration update 


0230 LDX GF2 (start) ; get loudness. OO=rest = note 
O252 GTX SDP ; send to port 
0255 TAL ; move frequency arguement to counter 
0236: DEX (loop) ; count down to zero 

’ 

; 


0252 LDX ##00 « turn off port 

0254 STX #DFCO | 

O25 TAX | ; move frequency arguement to counter 
0258 DEX (loop2) ; count equal time with port off 


0259 NOP NOP NOP NOP NOP 
0258 NCP NOP NOP NOP NOP 
0263 ACP NCP HCP NUP Aor’ . 


0268 BNE (loop2) ) ; if not O do over 
O26A DEC $F3 ; count down duration low arguement 
026% BNE (wait) > if not O waste same amount of time for 
9260 | ; high countdown 
026% DEC ~F4 ; count down duration high arguement 
0270 NE (stort) - if not zero start over 
O272 «TS else return 
O273% SEW CO (wait) waste time equal to duration high check 
0275 By CO 
0277 NE (start) ; low not zero, keep going 
TASLE 1 
Middle C | 261.62 ) c A 
ns Pi 
C#, Dflat .* wre Hee 
D 295605 
‘D#, Sflat $412.43 
5 | 929.65 3 
F | 349.23 7 
#,Gflat 369.99 . 
g 391.99 | 
G#,aflat A135 50 | 
‘A 440 
Av, Dt Lat 466.16 = out 


Cc 


3 493.88 9 


ANSTALLATION OF CUE by E. Cahoon 
There must be at least three ao 
versions af the monitor ram fram QS, 
In my Superboard IT had an EPROM Labeled 

2/ee which is am Intel S volt Bk 
device. I chased around in circles for a 
shart time until Io verified that fact. 
After that it was ai very shart hap ta 
changing WS from ground ta A110, Ne 
splices, cuts, etc. needed. Just change 


ag ciagramecd bellows 
=o} 
cA cr] 4" 
| 4 
Uid 
Mei, to 


A hint when working with the pads, I 
placed the point of my solder iran under 
the jumper Loop. After the solder 
melted I just lifted up. Came aut with 
ne prabl ems. { then cleaned the holes 
with solder wick. I took the pins out 
of an Augat Tl socket T had and 


ZOU 


soldered them into the pads. Ne, 22 
wire warked just find in them for 
readily changeable jumpers.,. The pins 
leok as follows 4X3 ’ & Little 
scrounging around should" turn up 


Suitable substitutes. 

The cursar funmetions are great in the 
Cle. Almost as good as the HF-8S. 
Unforutnately, that is all =- have been 
able toa use sa far. 


NOTE * x In reference to the FARALLEL 
PRINTER Interface article in the Dec. 
1981 Journal, we didn*t realize that 


Australian 
than yours, $0 we are now updating you 
with current prices im Aus. and W.S. 
currency, alsa ait if now avail. 
assembled and tested, either with a wire 
weap plug (straight in the ACIA socket) 
Or using a ribbon cable. 


PARALLEL FRINTER INTERFACE PRICES 
UNDRICCED POR. ween ne $450 £5.99 U.S. 
DRILLED PCReaeaacaasBSr6O $7.44 
ASSBLD AND TESTED...#39-93 $44,95 
(WIRE WRAP FLUG) 

ASSBLD AND TESTED...#37-95 $42, 50 

24 WAY CABLE W/DIL 

PLUGS (8 INCH) ...e.e.811-95 £12.99 

ADD #2 TO ALL PRICES FOR FOST. AND 
PACK ING. 
WRITE: GEOFF COHEN, 72 SFOFFORTH ST., 
HOLT, AaAC.T. 2615, AUSTRALIA 
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dollars are worth & bit more 


10 


JOHN C. SCHERR, VIRGINIA 


I have just installed the Disk Switch 
which To purchased fram Aardvark. The 
gwitch works as advertised by turning 
off the drive moatar when not needed. 
The kit took me about 2 hours to wire 
and IT had na trouble with the assembly. 

I did have trouble when using your 
Fantastic Copy. The motor would never 
Come Om. To fix this 2 added a DFST 
switch which reconnect the foil cuts at 
S and ds 


RON RATTLE, ROZEMAN, MT 


In the October 1981 Aardvark Journal, 


Thamas Owen of Miami Florida offers a 
fix for disk when a CiF has been 
madified to operate at 2 Mhz. His 
circuit will work but is not needed 


because a 25 Kh2z siqnal ais already 
available an the 6190 board. Fim iil 
(eleven) of chip UlS outputs eo Khe 
when the input clock is 2 Mhz co oe) a ar 
QOol even provides a jumper pad for this 
fix. Just cut the original jumper and 
install a new jumper wire as per diagram 
#1. Diagram #2 illustrates the actual 
frequencies coming from chip Ula when 
the CiP is Purnning at 2 Mas. ff. urqe Cir 


owners to purchase the Sams service 
manual, my source of information. 


Diagram & (Glo Bd) 


A, MOSSBERG, FLORIDA 


[If you've messed up aA program, 
particularly one that FOKEs alot ta low 
MaMaryY, YOU can recaver the program by 
hitting BREAK (mM), »AZ74, and list the 
pragram. (Or if there is garbage after a 
few lines, notice what line number was 
last listed, re-enter RASIC again by 
jumping ta AZ74 through the manitor., 
Type the line nmumber to erase it, if 
the screen goes crazy go back to BASIC 
through A274, Type list, if the program 
appears correct Save ta tape and cald 
start. If the program still has garbage 
repeat steps to remove it. Mix yourself 
a drink and be glad you didn’t lose all 


that work. 


C OuT A ] 


I maz 


» 500 Kiz 


250 Kuz 
125 Kh2 


RE-LINE DELETE FOR OS65D 
A FEW TIFFS FOR Cis ROM OWNERS by A. Jansen, S. Australia 
by Tom Warfel, Ohio 


We have discovered that by printing 


If you have the new Aardvark ROMs and line numbers to memory and then using 
want toa add the bell, but dan"*t have a the indirect file to bring them back 
7417, take heart, you don’t need iit. into the workspace an intelligent LINE 
Cannect the speaker and resistor ta DELETE results. For example: 
where ping ds and 14 of U68S would be. I 
WOuld suggest adding a switch as POKE9SS4, 120: POKE9368,120:REM SET 
SamMtimes you may not want the bell. I 3 INDIRECT FILE (80 FOR 24k) 
mounted the speaker behind the keyboard POKE9SLOS, OsPFOKE91O6, 120O:REM SET MEM 
with epoxy. _ QUTPUT TO SAME FLACE 

Pat 1Y UC UGB Keyboard FORL#2001 TOSZ01STEP LO: PRINTHS, Ls 
‘ oognoog NEXT s 7#5, "OK" : 
765 432 4 ie oe ' 
B@ 9710 Wd 13714 Print line #"s 2001 to S201 in steps of 
Pin 13 UCB HoOooOodg \ 10 to mem. The “OK" is a dummy to cause 
5 s a "SN ERROR" otherwise garbage will be 
printed to the workspace. The (CTRL X) 
Lect to read these #’s back to the workspace 
Tf you have the Semi-intelligent and they are deleted fram your program! 
Terminal program and would like to use You must then (SHIFT ™) as usual to 
the new screen drivers, adds: reset the indirect file. You must also 
925 FPOKE632, 238: POKE6S3, 2355 raset the memory pointers if you want to 
repeat. Using this, any black of lines 
Algeo if you're considering adding the you can specify can be deleted at will. 
Video Mod If, fig. 3, U29 should he We normally write programs with line 
marked U44, (74.5163) #°s ending in 10, then make correctians 


on even lines, reserving odd lines for 
diagnostic prints ete. This delete then 
allows us to remove the prints and any 
other garqabe without affecting the 
INTERFACING THE SO2 BD (C4P) TO THE MX-8o BIraqram. 
pF (NN by J. Coyle, Pennsylvania 


SAYING SPACE USING INTEGER VARIABLES 
Instead of populating your Challenger by P.E. McQueen, Indiana 


for RSes2 and investing in the Epson Ever wonder why some variables in some 
RS232 Interface I suggest tieing the of the OSI utility programs use a "%" 
existing TTL Serial Input of the Epson sign at the end? Although the OSI 
to the S02 board. documentation doesn’t mention it (among 
many other exceptions) it is part of the 
OSI BASIC, 

The "4" gsidqn indicates that the 
variable is an integer variable and as 
such requires less space to store each 
separate accurrance such as in an array. 

While a standard numeric variable 
requires five (5) bytes to store each 
MX80 Inside TB separately defined OC CUPP ANCE s the 
SERIAL INPUT numeric integer variable can be stored 

| in two bytes. IT was going to provide a 
capy of a short program to illustrate 
this but half the fun of workin with 
micros is to try things out for yourself 
and not having to be led down the 
primrose path every time. A few hints 
for those who may just be discovering. 
what variables are. The use of the DIM 
statement and the FRE(X) command will 
help in illustrating the problem. 

The nmumnberic variables (such as 
He Yada ee @tC.) use five bytes to store 
any value Cincluding floating point) up 
to a maximum of nine significant 
figures. The values are actually stored 
in ECD and it would appear that 10 
digits could be stored in the ‘five 
available bytes but the other half byte 
is used to store the sign (+ or -) of 
the value. The storage of the numeric 
integers is ain binary format and is 


Also jumper MX80 THR Pins &., 15, and 21 
to Fin 24 for 300 baud. Pin 21 is ta 
enable Serial Input. Fins 3, 3, 17 and 
iS vary baud rate. Pin 24 is ground. 
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limited to a maximum value of Fak C327 68 
by tes). Since there are 16 bits in the 
two byte storage area it would appear 
that values to 646 could be stored but 
aqain one aft the bits is used for the 
sign ea only IS bits are available tea 
stare the value. Also, by definition, 
inteqer variables are not floating 
point and values im excess of 32K will 
Cause a data error. One Limitation. 
These variables will mot work in a FOR 
NEAT loop. For three bytes gain, it 
probably does not seem to be worth the 
effort CO use the integer variables but 
in large arrays the bytes add up in a 
ulriny « 


The article above concerns the use of 
integer variables to reduce pragram size 
where applicable, Considerable space 
can be saved aif arrays can he 
cangstructed with integer data instead of 
decimal data. The following listing is a 
shart program that displays a figure of 
a man that i168 very important im the 
historical development of aur country, 
To achieve the desired effect, the 


digsolay must be done in B® W, It alse 
is the basic technique ta display any 
figure that can be defined in varying 


shades of grey. 


2 FORI=i1TOS2:PRINT: NEXT 

a FOKES6832,4:REM TURN COLOR ON 32 
CHARACTERS 

7 Lee4eDIMX (19), 2649) 

10 INPUT" INPUT BACKGROUND (99END) "sJ 
14 LFU=99THENPORES 4832, 12 END 

15 ST=97344 

30 FORT=STTOST+2049 

40 FOKEI,J 

Sc NEXTI 

60 INPUT"SATIGFIED's Ys: TFLEFT# (Y#, 1) <> 
WY OT MEN LO 

6% FORT=1TOS2:P RINT: NEXT 

7O DeST+6+6RL. 

80 FORJ=1TO19sREADX (J), 263) sNEXTI 

90 FORJ=1TO19 

100 D=D+64 

110 GOSUBSOONO 

120 NEXTJ 

S500 I[=PEER (37100) : IF l=PEEK (S7100) 
THENZSOO 

4000 RESTORE: GOTOLO 

SOOO FORT=D+X (J) TOD+Z (0) 

SOLO READS: FPOREI,$ 

BO20 NEXTI 

BOSC RETURN 

10050 DATAG, 8.459, 35,10, 2,10, 2,14, 2,14a15 
big Va Vi tthe 10.8, 10 

10060 DATAL, 19, bel, AAO, dy LO, 4, 10,4, 12, 
|e Be aay ae ae 
LOLOO DATALS, 243 

10200 DATAS,14,14,14,14,14 

10300 -DATAIS , 14,75. 5,14, 14, 14,24 

10400 DATAIS, 14.2575 75 35 15 14 14 

LO500 DATAL4 1441555 Bn Sn Ban 1515, 2 
10600 DATAI4, 14,2, 15,3, 5, 3. 35 3494 
1O700 DATAIS, 14, 14,2,15, 2,14, 15, 15614, 
14 : 
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tre. “Ria ws 


LOB800 DATALS, Se 25 ey Se 15, 14 Se 2914, 15, 
LO9OO DATA Sgt, 35 yg Ogg? eg dy 

11000 DATATS.3,2,15,3,3,15,15,2 

11100 DATAS,:2,2,2,15,15,3,14,2 

11200 DATAS, Sq 154 2,14, 252,45, 14,2 

11300 DATAS, 3,15,2,14,2,2.15,14,2 

11400 DATARS. 3,2,3,14,14, 14, 14,414,135 
£2300 DATARS, Be Syn 7n Ly By 15, 15,15 

114600 DATAI4,14,14,14,14,14,14,2,15,14 
11700 DATAI4, 14,14,14,14,14,14,14,14, 14, 
14,14 

LIBa DATAI4,14.14,14,14,15,15,14.14, 14, 
14,14 

11900 DATAL4 514514014, 14,14, 707 un 7e 14014, 
14 


CLT Tere or pel 


immediate mode 
a few mistakes, 


After doing same 
calculations and making 


I was faced with an all~too-familiar 
prablem: the screen was cluttered with 
Mk’ os", error messages, and blank lines. 


I had one key screen clear available, 
buk there was valuable information on 
the screen that I didn’t want erased. 

The "CLUTTER" program solves this 
Cir-C4P dilemma. It erases blank line, 
Qk’ s, and error messages, and transfers 
the remaining lines to the bottom of the 


(I EBERT 0 It can be set up as a USR 
reautine with POKELL, 34: POKEL2,2. Call 
Clutter by typing: X-UBRCX) or: put 


Km WSR <x) im line zero and call the 
Clutter program with a RUN command. 


higher line numbers will not be executed 
Dec ALISE ~lutter exits to the immecdiate 
mode. 


Clutter has 
and poke point-FF. 
mavecd up the screen, 
start of each line is 
the line should be erased or not. 
Line contains character strings 
identical to those stored in Clutter’s 
data table (TEL), the line is erased. 
If the line is to be saved, it is stored 
im the location pointed to by FF. When 
Glutter igs done, it prints an #A4 
graphics character (white block) and 
jumps to the immediate made. 

Ry adding to the table at the end of 
the program, you can expand Clutter’s 
repertoire of lines to be erased. There 
mast be a null (0) after every entry ancl 
a double null at the end of the table. 
Ry changing BNE DECST 
the proaqream) 
the DONE routine) to RTS, it’s possible 
to selectively erase and/or pack screen 
lines in a running BASTC program. 

For users with nonmestandard screen 
formats, LEN should be set to the number 
of characters per line that your screen 
Gigeplays. One last word: before trying 
program, make sure you have it 
capied correctly! IT had many a systems 
crash when incarrectly desiqned versiangs 
af Clutter ran amok in RAM. 


two pointers: start-ST, 

The start point 16 
line by line. The 
examined to see if 
If the 


(near the start of - 
to NOP NOF and LDA #862 (Cin. 


10 0000 SCLUTTER FOR OSI 

20 9000 LINE=$20 $$40 IF C2/4 
30 9000 LEN=$18 $$40 IF C2/4 
40 9000 ST=$4.5 

BO 000 PeEh47 

60 0222 KePOII 


oon ge ce Or a 
- FD O2ee 3 


80 O222 APO LUA #865 g$S$40 TF C2/4 

70 O224 8545 STA 5ST FSET START? FORE POINT. 
100 O226 3547 SrA OPP 

110 O228 APS LOA #$h3 PESO IF Cav4 

120 O22A 8546 Sih Sirl 

180 O22C 8548 STA FRI 

140 O22E [1054 pee. DECOY PRRANCH ALWAYS 

$0 VLA $ 

160 02350 ASFF CARLIN LUA deer r 

170 O232 AOFF Ci) LOY $F F 

180 O284 ES bed LHX 

190 0230 Ce TRY 

200 0256 BiBSO2 LA TRL x 

wale USF FOOSE KEQ ERASE gIF RULLy ERASE LINE 
ee O25 D145 ote LS sey PCOMPARE CHAR. TO SCREEN 
zou U3 FORD BEQ Cl gLOOF TF A MATCH 

240 O23F EC Lae INK 

20 O240 BiGs02 LiA TRL» x PGE YT NEAT TRL CHAR. 
260 0244 TOFA BAR - EZ UU Le ie 

2/0 0245 BUB84O2 LTA TRL+ibexX FOOQURLE RULL? 

280 0240 TOES KRE CO PNO» NEAT TRL ENTRY 
270 O24A 3 m 

3900 O24A ADLSE PRLIN LOY #LeEN jLiNE LENGIM OF SCREEN 
S10 O024C R145 LUA (ST d#¥ gGET CHAR TO KE MOVES 
S20 O24F AA. TAA PSAVE CHARACTER 

330 O24F APZO LTA #e20 FERASE GLO CHARACTER 
440 O251 9145 Sift SSi ast 

330 O254 3A THA gRES TORE CHARACTER 

$60 0254 9147 oth APR Oey gFRINT AT NEW LOCATION 
3/0 0206 82 TE Y 


gow OzZo7 LOS Bri. PALIN 2 


—— 


390 0259 ; 

400 0259 38 DECFF SEC 7PORE POINT UF 1 LINE 
410 025A A547 LUA FF 

420 0250 E920 SRC ALINE 

430 O25E 8547 STA FF 

440 0260 BOO? RCS  LECST 

450 0262 C648 HEC FP +4 

460 0264 

470 0264 38 HECST SEC sSTART UF 1 LINE 
480 0265 A545 LIA ST 

490 0267 E920 SEC LINE 

00 0269 8545 STA ST 

20 026B C644 NEC S8Tti 

30 0261! ; | 

40 0260 A546 [IONE LUA 8Tti §5T <8l000 IF TONE 
550 O26F CII CMF #ETO 

60 0271 BOB BCS CKLIN 

70 0273 A962 LIA #662 SPOINT MESS. AT $A162 
80 0275 4C78A2 IMP $AZ78 970 WARM START 

90 0278 

600 0278 A018 ERASE LIY #LEN SERASE A LINE 

610 027A A720 LIA #420 


~~ $620 0270 7145 STA (CST as¥ 


630 O27E 88 QE Y 

640 O27F LOFB HPL ERASE+4 $LOGF IF NOT DONE 
650 0281 30E1 RMI = =6fECST 760 TO DECST IF DONE 
660 02838 3 

670 0283 TRL 

680 0284 20 eRYTE $207 $202$20 9 $2020 


AM 680 0284 20 
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at) 
20) 
SF 
4C 
oS 
4 
O00 


286 
S680 0287 00 
690 0284 
670 02897 O00 
670 O28A 4F 
690 O28H 48 
670 O28C 00 
690 O28 
670 O2BE 49 
690 O2BF 

0292 


5670 0290 
670 O291 00 


680 0285 
SFO 


680 9 


THOMAS Wy RELALAR, Old 


yoo6 game as Ol lUbut right <1 o and ro wrap the 
Cue sor around the screen 
(RUBQOUT is the same as the CTRL] 


This program i8 written far thase CB CU LAETICL ED ) 
rare systems with the English ROM anc x nan working function that is 
awk Gr more mamoary and an MX-8O printer. supposed to insert a line of text 
It if a Screen editor that puts about b starting and ending marker for 
three pages-single spaced-inta memory underlining of text a 
and allows you to edit it, It alsa does ¥ display the non printing nulls on 
Under linking, but that a6 just an added the screen-as opposed to printable 
gimic. The pragram follows mane of your flanks 
rules for REMs, indeed it has none of (CTRL/v will annihilate the underline 
thage things. However, it is free, and characters, ) 
my rules guit me, 
The conventions for it are: [I thought about implementing the real 4 


ft it 


time clock to give the thing a blinking 


: keys initiated by halding down CTRL. cursor, but then decided mah. The non 
Simultaneously. 


Wait until gecand keystroke and put 
that up an the screenn-used to 
ioplenant cantral keys ag data 
outout the RAM buffers ta the 


‘dmter 


Gelete character aon scr@en and fidd 
right hand side with non printing 
rad ds 

dan't uge thig as this igs the 
standard CTRL/C to stop the program 
Gisplay the previous page of memary 
and update the current ane 

Gisplay the previaus page 

Mave cursar nandestructively down 
the screen 

same as cdobut up 

same as uo but left 


1 AKO: h=BS33M=O: kB=SO0002 Q=t2 T= 


printing nulls are binary two's and are 
put on the screen as 96 as opposed to : 
blanks which are F32,.The pragram stores 
about 3 gcreens worth of data im memor 
and could easily be madified ta use all 
af S2ko memory. A RETURN is necessary toa 
terminate print lines, but typing 
auwtamatically wraps around the screen sa 
there is mot really any "word wrap". Sa 
about every three screen lines I hit the 
RETURNethe print logic qenerates the 
Line Feeds so only the RETURN is 
necessary, The underlines are generated 
by counting characters and doing a 
RETURN then printing blanks then 
printing underscores to generate the 
underlines. Oh, yes the CTRL/V is turned 
aff by typing a second character. 


sn ‘Ge J=Oaheos re S763 NO: O=lePRINTCHRS (24) s 


2 FORISBTOB+82001 POKEL, 941 PRINTI 3 CHRS (13) s sNEXTI: V=24a SeS341 23 T= 32 
S Us23:E=0:GO0TO1O:REM TWE EDITOR VS.@ 7 September 1981 ) 
7 FORUSE TOU: FORI@ETOUs O=S+1+T kd: POKEA, 94: NEXT I: NEXTd: RETURN id 


io ee Face" s CHP ¢ 
Li A&Ss 24 
ce ITeFEER CAIs FOREA, 60: M=LISk ¢ 


13) 3:GOQSUB7: PURI aie PORe Dey ae 


Moa hMeFEER CR): TE M=26O0RM=SORM=VTHENSOO 


13 TFM=40RM=2 LOR M=180RM=120RM=9S THENSO 


140 TF M1 40R M1 SORM=1 oO THENAG 


1S [FM=22THENFOKEA, Ts GOSuUBBOO 


UTOlS 


a {5 
14 POREA, Mi IFMS1STHENZ=2+Ts sth enaee 
2 


1? feats TP ASZ+UTHENSY = 247s A= Z 
i Ths 

20 IPFM« -4THENSS : 
m1 FOREA, DsaeatrTs Z22+Ts IFAS 
ae Oelola 

oo LPM eel THENSS 


OTOL: 


MAL ZOTHENAHRA-Ts Z=2-TsGOTOLS 


24h FOREA, li A=A-Ts 2=2-Ts IFAC STHENA=A+T s Z=2Z+Ts GOTOLS 


iw GOTOLs 
ao LPT Slee n 9 


of PORE fy ele AFAtO: TFASZ+23THENA=2:G0TO1S 


a i 1 se 


oe? FPOREA, [leA=A-Or IFAS Z2THENA=Z+ll: GOTOIS 


20 GOTOLS 
40 IFM< > 1l4THENAS 


41 FORKEA, IT) Z=TeQ=0+0s IFQ213T 
42 FORJ=E TOU: POR TSE TOUs G=o+ 1 


4 PORE R+ (QO) kF+70+0%V, Ni POR 
44h RR EN TG CHES eS eg 1 ee 
io LPS elo Head 


HENG=0-O2 GOTO. 1 
+27 TE N=FEER CA) a M=FPEERK CR+OKP + T+ kV) 
Fey Me NEXT Ie QbNe xT Is Aeos ZA 


44 Z=7 3 FOKEA, I: Qs “QO IFO ETHENQ=0+0: GOTOI 1 
47 FOR T2E TOU: FOR T@E TOU: AeS+T+2 ka NP EER CA) se M=FPEER CR+Q0 KF +I 4) 4,7) ; 
4¢ POREA, Ms PORER+ (O40) XF+T+0kV, NE NEXTIGNEXT I: ASS Zea 


49 PRINTO: CHR (12)92G0TO12 


SOO GeOrt=O:rPOKEA, Ts Mec: PRINTCHRE (26) 


) 
2Ol DRO: INFUT"Line spacing": Ts IF IS20RI< 1 THENSOL ~~ 


S10 PRINT'ESC TO START": IF l=2THENDR=—1 
S20 TE PEEK C7088) <> 2S THENS SO 

S40 SAVEsPRINTs PRINT: PRINT: PRINTS PRINTS 
S80 Neo: FOR TSOTOLS: FORJ=OTO2S: FORK&=OTO2S 


we? Lower tot eee RY @ [eis 


SO THENPORES 1 7 «Os PR INTCHRS (25) es CGOTOiO 
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S80 [FPL<>94THENGOSUB91O: C=C+1 


881 IFL=137THENFRINTCHRS (10) 4s NL=NL+i1C=O8 TFNL=S6THENGOSUB7OO 
583 IFDB=—1THENIFL=137THENFPRINTCHRS (10) 3 ¢NL=NL+1: TFNL SOS6éTHENGOSUB7OO 


284 IFL=2ANDG= +1 THENG=12 GOTOS90O 


335 IFG=1TANDL<« s2ANDIL« >9STHENH=H+1 s GOTOS9O 


wea DTFG=1ANDL=2THENGOSUB9SOOs G=OrH=O 


27 NEXTEs NEXT: NexTlsPRINTCHRS (140) :FORESI7, Os: FRINTCHRS (26) 3: GO0TO1O 


600 IFM« 226THENO6SO 


605 FORN=ATOZ+U: J=PEERK (N+0) ss POREN, Jt NEXT: POREZ+U, 96: G0TO1I2 


650 IFM< -9THEN7SO 
631 M=USRK (M) sM=FEER CR) sGOTO1S 


790 NL=OsPRINTCHRS (140) ss PRINTEPRINTsPRINTs PRINT: PRINT s s RETURN 
730 FPOREA, ls FORI=B+14x576-UTO (+0) F+RSTEP-V: FORT=ETOVs P=PEER (J+T7) 
foe POREU+I AV, Pe NEXT LE PRINT ds CHRS (415%) 2 eNE ATI 

foe FORIJ=S4148TOS4148+U:FP=PEER (J) sPORE (Q+0) XF+R, Pa NEXT 


7oaa PRINTO" “sCHRe(13)8 sGOTOLS 


GOO FORI=ETOUs FORT=E TOU: M=S+1+TkIs IFRFEER (M) =S4&THENFOREM, 3 


802 NEXTIseNexXTd: T=USR (1) 


GO4 FORJ=ETOUs FORT=ETOUs M=S+1+Txk Is IFFEERK (M) =S2THENFOREM, 96 


806 NEXT IsNexTds RETURN 


900 C=C-S'PRINTCHRS (13) s:FORA=1TOC—H: PRINTCHRS (32) 3: NEXTA 


902 FORA=1TOH: PFRINTCHRS (95) ss NEXTA: RETURN 
910 A=LsM=FEER (61440) 2 TF (MANDI) =OTHENOLO 


915 FPOKMES1441,A: RETURN 
ME 
CORRECTION TO ALTEN RAIN 
by Nelson Van Elderen, Michigan 


The following is a list of lines to add 
or change in Billy D. Smith’s ALIEN RAIN 
program to add sound to it. (Aardvark 
Journal Vol. 2, No. &, Fage 15.) I 
encountered one problem while working on 


this. Every time I tried ta Add ar 
Change ai line, line 170 would scramble 
itself. Separating line 1790 into two 


separate lines seemed toa fix the 
problem. I say seemed to because I have 
absolutely mo idea why the problem 
would occur in the first place, nor why 
splitting the line into two lines would 
fix it. IT also wonder if this would be 
a problem unique to my system (C2/4P 
w/8K), a& bad memory chip somewhere, or 
if it is a problem other have o run 
ACC OSS.» . 

Also, I dan't know if this the best 
or most efficient way of adding sound to 
Aa program, but with limited resources I 
had <(OSI*’s Manuals) it was the best I 
could come up with. 


TO ADD ARCADE TYPE SQUND TO "ALIEN RAIN" 
C4P 

ADD - CHANGE FOLLOWING LINES: 

& Q=57089:POKEO, 1s POKES6932, 2: 1-4 

45 POKEMP, U:MP=MP-V: IFPEEK (MP) =UTHEN 
POKEMP,FrPOKEQ, 150:POKEQ, 1:GOTO4S 

S54 FORX=100TO150O:POKEQ, X:POKEQ, I 

98 IFPM=TGTHENSC=SC+40:DB (CY) =-13 
FORX=75TO1S0:POKEQ, X:NEXT:POKEQ, I 

96 GOTOL20 

136 FORX=OTOSO:FPOKEO, X:POKEQ, X+50: 
NEXT: POKEQ, I 

172 FORX=1TO@:FORY=150TO2Z00STEPS: 
POKEQ, YiNEXTY:POKEQ, lsNEXTX:POKEQ, I 
191 FORX=150TO200: FOKEQ, XsNEXTsFOKEQ, I 
206 FORX=1TOS8: FORY=150TO2Z00STEPS: 
POKEQ, Yi NEXTY:POKEQ, Ils NEXTX:POREQ, I. 
S42 IFPP<128THENV=64: BA=S35731L=5:R=3 
S31 FORX=1TOS:FORY=150TO210:POKEQ, Y: 
POKEQ, Y¥~20:NEXTYs NEXTX 

352 POKEQ, I 

445 FORX=SOTO200: POKEQ, Xs NEXT 

446 FORX=17T020:FORY=1OTO2Z00STEF IO: 
POKEQ, Yi NEXTY:NEXTX:POKEQ, I 

447 PRINT:PRINTSPRINTSPRINT" TOTAL 
SCORE =4SC 


RORERT VAN SINGEL, 3 RIVERS, MICHIGAN 


10 INPUT" WHAT DO YOU WANT THE BUNNY TO 
SAY" s At 

20 A=LEN (AS) : IFA>LOTHENDIMB (A~1) 

SQ FORT=0OTOA~1:BS=MIDS (AS, 141,41): 
R(T) =ASC (BS) sNEXT 

40 INFPUT"OQUTPUT ON PRINTER OR TERMINAL 
(F/T) "SAS 

SO IF ASS >"P"'THENZ=102 GOTO7O 

60 DISK!"IO ,O1"1Z=15 

70 GOSUBI4O 

80 PRINT 

90 READX: IFX<OTHENSO 

100 TFX>2128THENLSO 

110 PRINTTAB(X+Z) 4:READY:FORI=XTOY: 
J=I-AXINT (I/A) 

120 PRINTCHRS (B(J)) s:NEXT:GOTO9O 

130 GOSUB140:GOTO2Z90 

140 FORT=17T06:PRINTCHR# (10) psNEXT: 
RETURN | 

L5Q  DATAL, By dy Oy By Fg Og m1 On 43, 
Sym 1,9,7,41,52,~4 

160 DATAL,9,37,50,~1,2,11,36,50,—1, 

3, 135,34,49,-~1,4,14, 32,48, ~1 

170 DATARS, 15,315,479 ~-146.16,30,45,—1, 
74175 29,44,~1,8,19,28,4%, 4 

180 DATAG, 20, 27,41 y~1y 10, 215 26,40,—1, 
11,22, 25,38,-1,12, 22, 24,36, ~1 

190 DATAIS,34,-1,14,33,-1,15,51,—-1,17, 
29,~1,18,27,~1 

200 DATAI9, 26,~1,16,28,-1,15,30,—1, 11, 
1,-4, 10, 22, > . 
210 DATAGR, 33, —1 4575 S4y—1 46g 13, 16, 354,—-1, 
5,12,16,35,—1 | 

220 DATA4, 12, 165 35,44 34125155 Sg ml Ze 
35,~1,1,35,-1 ; 
2SQ DATAZ, B4y—dy Sy B4g mb gy BB ym dg oy Boy 
“1,10, 32,34, 34,~1 

240 DATAI4,17,19, 25, 28,31, 35, 55,~1,15, 
19,23, 30,36, 36,~1 

250 DATAI4,18,21,21,24,30,37,37,~1,13, 
18,23,29,33,38,~1_— | 
260 DATA12, 29,315,334 —1_41415,17,17,19, 
19, 22,22,24,31,-1 

270 DATAIO, 11,17, 18, 22,22, 24,24, 29,29, 
ines i : 

2BO DATAZZ, 234 26, 29 y~ 14 275 BIg m1 y BE BI, 
~1,4096 

290 IFAS="T" THENEND 

200 PRINTCHRS (27) :CHR#(70): DISK! "IO 
02" s END 


CORRECTION FOR YACHT RACE 
by John Sakamoto, California 


The following corrections were made to 
the "Yacht Race" program that was 
published ain the February 1982 (Vol. 2, 
No. 6) issue of the Aardvark Journal. 


hod PORE MA te ee cee ne 


S87 SEAM Gate MERE e ORCS 
607 TFEMS="N" THENRM= MN Oo) 
704 TRCOM$="N" THENCM=—-MN Co) 


WARD HORNER, MARYLAND 


I ownoia CIP modified to run at 2 Mhz 
and have a passion far pragramming 
realtime games. IT program bath in BASIC 
and machine code and enjoy designing 
interesting graphics routines. 

I am amazed at the number af 
Wirealigtic explosion routines TI have 
SEG » Most of these routines bear only 
& vague resemblance to an explosion and 
they don’t even begin ta explare the 
vast pogsgibilities of OST graphics. 

With this ain mind, J have written an 
explosion routine from my latest game 
(which is called HITMAN). I modified it 
to run oon C2/4 machines and added a 
control loop. It was designed to run an 
a2 Mhz machine, but it stild looks 
pretty good at J] Mhz. To start 
explosion, press shift. 

The graphics in this routine may he 
easily changed by madifying line ooo 
and changing SE (size of explosion) in 
line 20, to the number of characters in 
your modified explasian. AlSa, try 
incrementing TE (type of explosion) in 
line 20 for some interesting effects. 

In WHITMAN, I get TE=2. This setting 
leaves a few dots behind, as you will 


see, but if you use dots for background - 


stars or make the last two characters in 
the explosion blanks it won't matter. 


10 FORIT=1TOS0:P RINT: NEXT 

20) SE=14;TE=O: T2=32:DIME (SE): 
FORT=1TOSE: READE (1) :NEXT 

40 CT#S3775:AeS1i1 B32: C2331 NL=254 
60 IFPEEK (S7088) +1 28THENIOO 

80 CT=34259: A651 R64: C245: NL=1 
100 RW=INT(9XRND (8) ~4) sCLeINT (9kRND (8) 
—~4) sM=CT+RW+CL KE s POKEM, 244 

20 IFPEEK (57100) =NLTHENL2O 

199 REM explosion routine 

200 FORT=17TOS:FORU=16TOS2:FPO0KEM, J: 
FORK=17TOS:NEXTK,J, 1 
220 FORI=1TOSE 
240 POKEM+AX1,E (1) sPOKEM-AkI,E(I)s 
POKEM+CKT,E (2) sPOKEM-CKI,E (TD) 
260 POKEM-1,E (1) sPOKEM+I,E (1): 
POKEM+BRAI, ECL) sPOKEM-BkL,E (1D) :J#l-TE 
280 POKEM+AKI, T2:POKEM—Axd, T2:PORE 
M+CkI, T2:POKEM-CkI, 72 
SOO POKEM-J, T2sPOKEM+70, T2:POKE 
M+BKI, T2:POKEM—~BAD, T2: NEXT 
BOO GOTOLOO 

1000 DATAIS2, 13, 214,4,60,435,199, 
198,127,47,44,44,45,46 


NOTE: If you get TE=Z and dan*t want to 
leave dats behind, add to the end of 
line O00 ", 32,32" and make SE in line 


2Q equal to 16, 


16 


& LITTLE NOTE FROM CHRIS DAVIES 


You would think that living in New 
Yealand would put us right out of the 
computer scene, this is NOT true. 


Although a Superboard here costs over NZ 
$600 there are quite a few people with 
OSt machines and we even have our own 
OSl users group here in Christchurch. 
(Note: how do we get official 
recognition?) 

T have an 8K Superboard IT and am 
very pleased with it. Incidentally my 
board was bought in the States for U.&. 
$279,900, (4 considerable saving). 
Upgrading toa a C4PMF is a digtine 
possiblity because the 8k of the 
Superboard just is mot sufficient! Wel I 
that’s about all I have to say. 

T just thought I*d right and let you 
know that even we Kiwis have computers 
and also that New Zealand is not an 
Aussie state (as some people seem ta 


think. Have a good look at a world map 
sometime you might even find us!) 
Having encountered tips ino your journal 


and from our group has made programming 
a relative breeze after working on a 
Digital machine for four years. I 
follow your Journal with much imterest. 


CORRECTION by Alan Falkenstein 


IT have finally solved the Death Ship 
adventure game. (After about 30 hours of 
work) « I enjoyed it throughly. rt 
certainly was a well written game. I 
find it truly amazing that you were able 


to do it within 8k of memory. I have 
made a few changes that you may wish to 
LSE. 


1) STRING BUG FIX: change DIM (line 119) 
of Dé from 18 to 20. In line 120, insert 
Q9=FRE(X) ain front of the prints. 
(reference: page 28 of Ed Carlson’s "All 
About OSI Microseft Hasic In ROM) 

2) DOOR IN CAFTAINS CABIN: After 
antering the Cabin, there are no exits 
and ma door. I chase to change the 2nd 
i@ in line 740 to a 14. 

=) ROPE TIED TO RAIL?: After you get the 
water in the bucket, you'll observe that 
the rope is tied to "BU" if you go to 
the MIDSHIF DECK. I can’t explain why, 
but I changed lines 1490-1430; 

1400 PRINT'TO WHAT" s GOSUBR14690: GOTOL420 
1410 O#(8)="ROPE TIED TO RAIL "sh C2) sls 
SMITOL20 ‘ 

1420 LF (Ad="ST"ORAGH=" RA") ANDL=6ANDL (2) =O 
THENF 2=11sGOTO1410 

1450 PRINT'NOT THERE, STUPID" sGOTOL20 


& FEW CHANGES IN * BREAK THRU?’ 
by Jay Friedman, Ohio 


The following program changes in 
Aardvark's  BREARTHRU allow for 
additional walls to be played after the 
first wall has been broken down. Since — 


it is fairly difficult to eliminate each 


and every block for a score of 420, line 
"40 can be modified to build a new wall 
at a smaller score. For example, if 
CHA4OO then 350. This way four of five 
blocks can be left then anew wall is 
poked anta the screen. 


165 FORX=SD-STOSD+3:s POKEX, Sa: NEXT 

146 REM CLEARS OLD SCORE 

19S 

FOR X=(50+0F TOGC+OF +2040: FPOKEX, T3:NExTs 
GOSUB2ZO0O:s GOTO2Z3O 

196 REM 200 18 THEN WALL BUILDING 
ROUT INE 

2e0 FOREGO+X+54KLC, LOLs POKREGC+X+64"L0C, 187: 
NEXT: CH=O; RETURN 

“el REM CH KEEPS SCORE 
SCREEM 

290 D#=STR$ (9) sD=Sh—3 

OOO FORYs 2 TOLEN (DS) sPOKED+Y, ASC (MIDS 
(DOS, VY, Ld) a NEXT 

SLO FORESD+12, RALLS+48 

Oh) REM 290-300 FOKES NEW SCORE ONTO 
SCREEN. 310 PORES BALL NUMBER 

~40 PePEek CS7080) s TECH -420THENSSO : 

m4 IFRAGC+34LC+20RER-GC+74LC+W— 1 THEN 
BOSURBZOO 

46 REM 420 [5 THE SCORE FOR ONE SCREEN 
B47 REM 345 WAITS UNTIL BALL IS OUT OF 
WALL AREA REFORE GOING TO 2Oo 

870 TFPI 87 THENS#=S+2: CH=CH+2 

BBO TFFP=161 THENS=S+ 1s CH=CH+ 1 

890 [Fre232THENS=S+4s CHeCH+4 

900 TFRP#233THENS=S+6 2 CH@CH+6 

901 REM 870-900 ADD POINTS TO CH 


OF CURRENT 


RUSS TERRELL , 
CORRECTIONS 


ROSEMOUNT, MINNESOTA 


These program patches will let you use 
Joysticks with the game "ANTI-AIRCRAFT 
ARTILLERY" Vol. 2, No. 2. 


120 CO=S3204:LC#32:1We251PislGisP2e127: 
FORX=OTO6: READE (X) NEXT: TA=4 
900 DATA4S, &, 2,64, 128, 32, 2,127, 247, 


225,127, 247, 223, 253 


After 10 hours of work, here are the 
program patches to get monitor ROM. Due 
ta canflicting addresses in ROM and the 
pragramnm, BASIC crashed. The program has 
been relocated to $0232 (362). 


~ POKE 621, 0:FORK=4627TN641:POKEK, 32: 
NEXTKs POKER, 255 

10 DATASS62, 4620 

2] DATAL74,359,211,24,173,51,2, 105, 32, 
141,71 ney 17S, 5, 105,90 

=O DATAI4SI, 72,2,142,195, 2908,24,173,51, 
2,204,195, 2908,8,173, 52,2 

40 DATAZO1, 208, 208,1,96,586,173,51,2, 
fooy dy 141,51,2,173, 52,2 

~] DATAZSS,0,141,52,2,76,50,2 

60 kKkthis line has been deleted. 

79 PRINTCHRS (26) 2" Potato Chips" 

120 POKELL,O:POKELS, 2533 X=USR(X) eK e427 
124 X=PEEK (CK) sPOKES S41 3+kh-627, Xekeki+d s 
GOTOL22 

190 POKER, 127:FORZ=17T010: IFPEEK (CP) < > 
127 THEN2SO 

1095 PRINTsPRINT:PRINT' The 
is": PEER C621) PRINT 

1997 IFSSPEEK (621) THENIISoO 
1150 PRINT" You have beaten 
it. "#PRINTsPRINT:s POKE 621,95: INPUT" Your 
rames" 

1170 FORK=627TO0627+LEN (S%)-1s POKER, ASC 
(MIDS (S$,kK~526,1)) sNEXTE 

1350 DATAI4SG1,114,2,169, 2, 133,12,169, 50, 
LSSy 414169, 595441, 91,2 

1340 DATAI69, 211,141, 52,2,96 


high score 


17 


JACK VAUGHN, TEXAS 


Here is a short program called "TEST 
YOUR REFLEXES". | T have no way to test 
it except on my Superboard, but I 
believe it will work on others. 


2 REM JACK VAUGHN 

4 REM 3695 BRYAN DRIVE 

& REM BEAUMONT, TEXAS 77707 

@ REM LINES 10-18 SET UF FAST SCREEM CL. 


EAR CALLED EY ° X=USR(X) * 


10 FORX=576TOS98: READY: POKEX, Yi NEXT 

2 DATAIG?, 208,160,0, 133, 255, 132, 254 

14 DATAI&2, 4, 169, 32, 145, 254, 200, 208, 251 
16 DATAZSO, 255, 202, 208, 246, 96 

18 POKE11,64:POKE12,2 

22. C#="SWHSOIUN PDGEERRRAMWNAQDNMMFAAAN 


SSOP TURSDE YK DORY " 


ee VIDEO=6001 TFRPEERK (57088) «129 THENVIDEO 


=zI40:s GOTO2S 


24 FPiSeZ47 kP=1892 FO25501 GOTO28: KP=VALUE 
IF D&K ARE FRESSED TOGETHER. 

20 PIFerkP=661PO=207%3 

2 X=USR CX) REM SCREEN CLEAR 

“a? FRan” TEST ‘YGUR REPLEAES  SFRINTIPR 
INTSPRINTsPRINTSPC CLO) "OR 

oO FRINTIFRINTS PRINT: PRINTSPC(4) "ARE YO 


UW SOBER?” 


ot FRINTSPRINTs PRINTs FORX=1 TOS0008 NEXT 
oO FRINTs PRINT" AS SOON AS YOU SEE": FR 
INTs PRINT" KX GO KK," 

28 FRINT&:PRINT" FPRESS 0D AND Ky 

40 FPRINTIPRINT' AT THE SAME TIME. "i FR 
INT 

4 INPUT" 
4& X=USR (xX) 
48 FORX=1TO4500XKRND (CX) sNEXT 

SO FORX=1TOL2:PRINTs NEXTEPRINTSPC (8) "XK 
GO XxX 

we FORX=OTOLO0O00: FOREPO, 1: PORES7O89, P15 


READY" s Ag 


PrP ek (57088 ) 


24 IFPE=kKPGOTOSS 

we NEXT 

Je FOREFO,OsFRINTasPRINTSPC CLO) xX 

60 PRINTSPRINTs IFX¢3GOTO06S 

62 FRINTSFC(S) "YOU CHEATED" :PRINT: PRINT 


SPC(S) "DO IT AGAIN 


64 GOTO4S 

64 IFX¢aGOTOLOO 

68 IFX<11GOTOL1O 

70 IFX€13GOTOLZO 

72 IFX<iseoToi4ae 

74 IFX<17GOTOLSO 

74 PRINT:PRINT 

78 PRINT" GOBER UF AND TRY AGAIN! 

80 PRINT: PRINT: PRINT: PRINT 

92 PRINT" TRY AGAIN":: INPUTAS 

94 X=USR(X)sFORX=1TO6:PRINT: NEXT: GOTO46 
86 PRINTSPC(3) "TEST YOUR REFLEXES : 
100 PRINTSPC (8) ::FORY=4TO2SSTEPS:PRINTM 
ID#(C#,Y, 1) ¢sNEXT 

102 GOTOSO 

110 PRINTSPC (7) ::FORY=2TOS2STEPS:PRINTM 
ID#(CH,Y, 1) 4s NEXT 

112 GOTOSE 

120 PRINTSPC (10) s:FORY=28TOS7STEPS:PRIN 
TMIDS(C#,Y, 4) $sNEXT 

122 GoOTOeO 

130 PRINTSPC (7) ::FORY=3TOSOSTEPS:PRINTM 
ID$(C#,Y, 14) 42 NEXT 

182 GOTOBO 

140 PRINTSPC(9) +s FORY=33TO48STEFS: PRINT 
MID®(C,Y,1)3:NEXT 

142 GOTOSO 

200 REM JACK VAUGHN 

202 REM 3695 BRYAN DRIVE 

204 REM BEAUMONT, TEXAS 77707 


KK PERSONAL ADE x # 


awh DISK DRIVE, Ci 

JOYSTICKS, 
FOR 32 

Via AND 


FOR SALE: O8F (CIF, 
FROG. SOUND GENERATOR, 
VIDEQ MONITOR, VIDEQ MODD If 
CHAR. DISPLAY, RS232, O865D) 
HME ADOS OF SYSTEMS, COMPLETE 
COST $1300+, BEST OFFER 
$800, Ra WHITAKER, 3715 RIDGECREST 
SALT LAKE CITY, UT 84118 


OVER 
DR an 
(DES we OPU 
edES CD = £3 
JOYSETICKES, te" 
DOCUMENTATION. 
CRAY Ts 


SALE: Cl/8F Sk, S40 VIDEO, 

SLOT BACKELANE, AARDVARK. 
B/W MONT TOR, SOFTWARE AND 
$650. CALL (616) 399—3109 


FOR SALE s 
XRF ANE [ON 


43h (4R<MF 2 DISK DRIVES, D&N 

INTERFACE, & CARD BACKFLANE., 
24k MEMORY BD (CALL NEC CHIFS), MICROTEK 
SERIAL IMFACT PRINTER. SOFTWARE INCLUDES 
QOGT FLANNER+, OST MDMS, DWO QUONG 
WROSo@, O98 We2, AARDVARK SUFERDISKE, 
OSGOSD V.a, SAMS MANUAL. $2400, LD. 
BROUDY (602) 729-5459 EVENINGS. 


ae / AR RASTO-TIN-ROM Cok 
USED ONLY SEVERAL MTHS, 
COMPLETE W/ALL MANUALS AND DOC... CARLES, 
DEMO-PROGRAM TAPE. SHIFPED VIA UPS. 
WOO. CONTACT: AL ADAMS, 4512 NN, 
SAGINAW RD, APT #221C, MIDLAND, MI 48640 


FOR SALE s OST 
mem) 2& YR& OLD, 


FOR GALE: O81 CSC 36 MB. BEST OFFER. 


CALL (212) O35-4456 

woe 744M HD. 3 MICRO-TERM 
s/ Mirs i YR 
BOX O17, 


COR OS I 
CRT. 
QLD. 
ROYAL OAK, 


GALE § 
Tad. 820 FRINTER SEEED 
16,500, (C313) S4e—10O20 / 
MI 48048 


AARDVARK 
2352 SOUTH COMMERCE 
WALLED LAKE, MI 480gg 
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FOR SALE: S YR. COLLECTION OF OSI EQUIF., 
INCLUD. (ie CLF? S, A BROKEN 610 BD AND 
(a) DitBe DRIVES. THERE ARE MANY MOPFEE 
ITEMS AND MANY ORIGINAL FROGRAMS EOTH GN 
DISkE AND TAFE. FLEASE SEND SASE FOR 4 
LISTING AND PRICE TO E.H. GROWN, FLO, 
ROX 2eli, WARNER ROBINS, GA 31la99, 
FOR SALE: SUPERBOARD PRE-CUT CARINET EIT 
$e7.OS FFD. COMP. W/HARDWARE & EXCEL 
INST SET, RS232 KIT #9.95 PPD. WRITE FOR 
CAT OF EKITS, HARDWARE AND ACCES TQ DEE 
PRODUCTS, 159A BIRCHWOOD, LE MARTON, 
ILL, 0110, 


FOR SALE: OSI SUFERBOARD @ 18K. GRAFIX 
SUPER EXPANGION BD, HI~RES DISPLAY, 
PARALLEL PORT & EXPANSION RAM. CASE & 
MUCH SOFTWARE. ASKING $450. STUART HAAS, 
(914) 3357-5447 


WANTED: AMATEUR ASTRONOMER LOOKING FOR 
ASTRONOMY FROGRAMS THAT RUN ON A CAF. IF 
ANYONE IS USING THE CIF FOR TELESCOPE 
CONTROL, ANY IDEAS WOULD BE AELPFUL., 
ANYONE THAT CAN HELF WRITE: DON GRENDA, 
aoce OTH AVE, UNIT 6D, S. MILWUAKEE, WI 


tach tgccd eae egal 


FOR SALE: OST C4F—MF, 
MF DRIVES, 64 X 32, 9" 
HI-CAPACTTY SWITCHING FOWER SUPFLY, ON 
SCREEN CLOCK -CALENDAR,  W/BATTERY, BSF 
INTERFACE 2) JOYSTICKS, VOTRAX VOICE 
SYN.» TTY MODEL 40 LINE PRINTER, OTHER 
ACCES ., COMP. DOC., LOTS OF SOFTWARE, 
$3000, BOR ARONSON, (S16) 799-3479 


43k, 4 DUAL—SIDED 
B/W MONITOR, 


& 


a 


WwW 
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